home *** CD-ROM | disk | FTP | other *** search
- #include <stdio.h>
- #include "machdep.h"
-
- /* TTY input driver */
- #define NULLCHAR (char *)NULL
-
- int ttymode;
- #define TTY_COOKED 0
- #define TTY_RAW 1
-
- #define LINESIZE 256
-
- #ifdef AMIGA
- #define CTLX 24
- #endif
-
- #define CTLU 21
-
- raw()
- {
- ttymode = TTY_RAW;
- }
-
- cooked()
- {
- ttymode = TTY_COOKED;
- }
-
- /* Accept characters from the incoming tty buffer and process them
- * (if in cooked mode) or just pass them directly (if in raw mode).
- * Returns the number of characters available for use; if non-zero,
- * also stashes a pointer to the character(s) in the "buf" argument.
- */
- int
- ttydriv(c,buf)
- char c;
- char **buf;
- {
- static char linebuf[LINESIZE];
- static char *cp = linebuf;
- int cnt;
-
- if(buf == (char **)NULL)
- return 0; /* paranoia check */
-
- cnt = 0;
- switch(ttymode){
- case TTY_RAW:
- *cp++ = c;
- cnt = cp - linebuf;
- cp = linebuf;
- break;
- case TTY_COOKED:
- /* Perform cooked-mode line editing */
- switch(c & 0x7f){
- case '\r': /* CR and LF are equivalent */
- case '\n':
- *cp++ = '\r';
- *cp++ = '\n';
- printf("\r\n");
- cnt = cp - linebuf;
- cp = linebuf;
- break;
- case '\b': /* Backspace */
- if(cp != linebuf){
- cp--;
- printf("\b \b");
- }
- break;
- case CTLU: /* Line kill */
- #ifdef AMIGA
- case CTLX:
- #endif
- while(cp != linebuf){
- cp--;
- printf("\b \b");
- }
- break;
- default: /* Ordinary character */
- *cp++ = c;
- #ifdef AMIGA
- printf("%c", c);
- #else
- putchar(c);
- #endif
- if(cp >= &linebuf[LINESIZE]){
- cnt = cp - linebuf;
- cp = linebuf;
- }
- break;
- }
- }
- if(cnt != 0)
- *buf = linebuf;
- else
- *buf = NULLCHAR;
- fflush(stdout);
- return cnt;
- }
-